SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO
CREATE PROCEDURE [dbo].[paCertificaAgregarSubProyecto]
-- < Registro de Actualizaciones >
-- 25-10-2006
-- 09-11-2006

	(@IdProyecto 			[int],
	 @NombreSubProyecto 		[varchar](200),
	 @Anio 				[int],
	 @AnioPresupuestario 		[int] = null,
	 @Destinatarios 			[varchar](250) = null,
	 @IdTipoSubProyecto 		[int],
	 @IdTipoCertificado 		[int] = null,
	 @IdTipoHora 			[int] = null,
	 @PerteneceRefepec 		[bit] = null,
	 @CodigoRefepec 		[varchar](15) = null,
	 @Observacion 			[varchar](200) = null,
	 @CantidadHoras 		[real] = null,
	 @HorasPresenciales 		[real] = null,
	 @HorasNOPresenciales 	[real] = null,
	 @EstadoPS 			[int],
	 @CodigoM3 			[int] = null,
	 @CantidadInstancias 		[int] = null,
	 @CantidadCapacitandos 	[int] = null,
	 @CantidadEncuentrosInstancias	[int] = null,
	@IDModeloCertificadoAsistente 	[int] = null,
	@IdModeloCertificadoCapacitador [int] = null)

AS
SET NOCOUNT ON
DECLARE @IDSubProyectoNuevo INT 

INSERT INTO Tb_SubProyectos
	 (  [IdProyecto],
	 [NombreSubProyecto],
	 [Anio],
	 [AnioPresupuestario],
	 [Destinatarios],
	 [IdTipoSubProyecto],
	 [IdTipoCertificado],
	 [IdTipoHora],
	 [PerteneceRefepec],
	 [CodigoRefepec],
	 [Observacion],
	 [CantidadHoras],
	 [HorasPresenciales],
	 [HorasNOPresenciales],
	 [EstadoPS],
	 [CodigoM3],
	 [CantidadInstancias],
	 [CantidadCapacitandos],
	 [CantidadEncuentrosInstancias],
               [IDModeloCertificadoAsistente],
	[IdModeloCertificadoCapacitador]) 
VALUES 
	( @IdProyecto,
	 @NombreSubProyecto,
	 @Anio,
	 @AnioPresupuestario,
	 @Destinatarios,
	 @IdTipoSubProyecto,
	 @IdTipoCertificado,
	 @IdTipoHora,
	 @PerteneceRefepec,
	 @CodigoRefepec,
	 @Observacion,
	 @CantidadHoras,
	 @HorasPresenciales,
	 @HorasNOPresenciales,
	 @EstadoPS,
	 @CodigoM3,
	 @CantidadInstancias,
	 @CantidadCapacitandos,
	 @CantidadEncuentrosInstancias,
	@IDModeloCertificadoAsistente,
	@IdModeloCertificadoCapacitador)

SELECT @IDSubProyectoNuevo = @@IDENTITY
RETURN @IDSubProyectoNuevo
GO
GRANT EXECUTE ON  [dbo].[paCertificaAgregarSubProyecto] TO [Certificaciones]
GRANT EXECUTE ON  [dbo].[paCertificaAgregarSubProyecto] TO [CertificacionesAdministracion]
GO
